home *** CD-ROM | disk | FTP | other *** search
/ Sprite 1984 - 1993 / Sprite 1984 - 1993.iso / src / lib / c / etc / sleep.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-09-06  |  2.9 KB  |  109 lines
  1. /* 
  2.  * sleep.c --
  3.  *
  4.  *    Source for "sleep" library procedure.
  5.  *
  6.  * Copyright 1986, 1989 Regents of the University of California
  7.  * Permission to use, copy, modify, and distribute this
  8.  * software and its documentation for any purpose and without
  9.  * fee is hereby granted, provided that the above copyright
  10.  * notice appear in all copies.  The University of California
  11.  * makes no representations about the suitability of this
  12.  * software for any purpose.  It is provided "as is" without
  13.  * express or implied warranty.
  14.  */
  15.  
  16. #ifndef lint
  17. static char rcsid[] = "$Header: /sprite/src/lib/c/etc/RCS/sleep.c,v 1.4 90/09/05 18:56:41 rab Exp $ SPRITE (Berkeley)";
  18. #endif not lint
  19.  
  20. #include <sys/time.h>
  21. #include <signal.h>
  22.  
  23. #define setvec(vec, a) \
  24.         vec.sv_handler = a; vec.sv_mask = vec.sv_onstack = 0
  25.  
  26. static int ringring;
  27. static void sleepx();
  28.  
  29.  
  30. /*
  31.  *----------------------------------------------------------------------
  32.  *
  33.  * sleep --
  34.  *
  35.  *    Delay process for a given number of seconds.
  36.  *
  37.  * Results:
  38.  *    Always returns 0.
  39.  *
  40.  * Side effects:
  41.  *    None.
  42.  *
  43.  *----------------------------------------------------------------------
  44.  */
  45. int
  46. sleep(n)
  47.         unsigned n;
  48. {
  49.         long omask;
  50.         struct itimerval itv, oitv;
  51.         register struct itimerval *itp = &itv;
  52.         struct sigvec vec, ovec;
  53.  
  54.         if (n == 0)
  55.                 return;
  56.         timerclear(&itp->it_interval);
  57.         timerclear(&itp->it_value);
  58.         if (setitimer(ITIMER_REAL, itp, &oitv) < 0)
  59.                 return;
  60.         itp->it_value.tv_sec = n;
  61.         if (timerisset(&oitv.it_value)) {
  62.                 if (timercmp(&oitv.it_value, &itp->it_value, >))
  63.                         oitv.it_value.tv_sec -= itp->it_value.tv_sec;
  64.                 else {
  65.                         itp->it_value = oitv.it_value;
  66.                         /*
  67.                          * This is a hack, but we must have time to
  68.                          * return from the setitimer after the alarm
  69.                          * or else it'll be restarted.  And, anyway,
  70.                          * sleep never did anything more than this before.
  71.                          */
  72.                         oitv.it_value.tv_sec = 1;
  73.                         oitv.it_value.tv_usec = 0;
  74.                 }
  75.         }
  76.         setvec(vec, sleepx);
  77.         (void) sigvec(SIGALRM, &vec, &ovec);
  78.         omask = sigblock(sigmask(SIGALRM));
  79.         ringring = 0;
  80.         (void) setitimer(ITIMER_REAL, itp, (struct itimerval *)0);
  81.         while (!ringring)
  82.                 sigpause(omask &~ sigmask(SIGALRM));
  83.         (void) sigvec(SIGALRM, &ovec, (struct sigvec *)0);
  84.         (void) sigsetmask(omask);
  85.         (void) setitimer(ITIMER_REAL, &oitv, (struct itimerval *)0);
  86. }
  87.  
  88. static void
  89. sleepx()
  90. {
  91.  
  92.         ringring = 1;
  93. }
  94.  
  95. #ifdef WRONG
  96. int
  97. sleep(seconds)
  98.     int seconds;
  99. {
  100.     struct timeval tv;
  101.  
  102.     tv.tv_sec = seconds;
  103.     tv.tv_usec = 0;
  104.     (void) select(0, (int *) 0, (int *) 0, (int *) 0, &tv);
  105.     return 0;
  106. }
  107. #endif
  108.  
  109.